What PC? 1996 June/What PC June 1996.iso/data/showcase/vrdemo.dir/00004_Loop script.ls

Text File | 1996-02-04 | 389 b | 15 lines

on enterFrame
end

on exitFrame
  go(the frame)
end

on idle
  global sliderLeft, sliderRight, sliderRange, sliderButtonSprite, videoSprite
  set movieLength to the duration of cast the castNum of sprite videoSprite * 1.0
  if movieLength > 0 then
    set the locH of sprite sliderButtonSprite to (the movieTime of sprite videoSprite / movieLength * sliderRange) + sliderLeft
  end if
end